ｄＢ−ＩＢＡＳＩＣ　インタープリタ＆コンパイラ ――――――――――――――――――――――――――――――――――――――― Ｉ／Ｏ　１９８４年　４月号掲載 Ｘ１ インタープリタ マシン語　０００００Ｈ−０５ＢＦＦＨ　Ｓ：０００００Ｈ コンパイラ マシン語　０Ｅ０００Ｈ−０Ｆ９ＦＦＨ　Ｓ：０Ｅ０００Ｈ 起動方法 インタープリタ ＩＰＬから起動 コンパイラ ＣＬＥＡＲ＆ＨＤＦＦＦ ＭＯＮ Ｌ Ｊ Ｅ０００ ――――――――――――――――――――――――――――――――――――――― パソコン・テレビＸ１用「ｄＢ−コンパイラ」は、 すでにＩ／Ｏ誌で発表したＸ１および ＭＺ−２２００用「ｄＢ−ＢＡＳＩＣ」の基本思想に基づき開発したものです。 ゲーム、ホビー開発用に強化した、 整数型ＢＡＳＩＣのｄＢ−ＩＢＡＳＩＣプログラムを このｄＢ−コンパイラで 簡単にマシン語にコンパイルすることが可能になりました。 コンパイルすると10数倍の高速処理をします。 オリジナル・ゲーム作りに大きな威力を発揮することでしょう。 なお、ｄＢ−ＢＡＳＩＣシリーズとして さらにこの言語思想を拡げていきたいと考えております。 ｄＢ−ＩＢＡＳＩＣの特徴 　●インタープリタ、コンパイラが同居できるので、 　　開発効率が高くなっています。 　●フリーエリアはインタープリタのみで４０Ｋバイト、 　　コンパイラと同居しているときで３２Ｋバイトとなっています。 　●Ｇ−ＲＡＭ上にオブジェクトを落とせるため、 　　オブジェクトも４０Ｋバイト程度まで作れます。 　●ＲＥＰＥＡＴ〜ＵＮＴＩＬ、ＭＰＵＴ、ＭＥＭ、ＩＮＡＲＹなどの 　　ゲーム用命令が強化されています。 　●プログラムは最適化されているので、 　　実行速度や効率が高くなっています。 　●コンパイラ自体マシン語で記述されているので、 　　コンパイル時間が短くなっています。 コンパイラの手順 ソース・プログラムはｄＢ−ＩＢＡＳＩＣのインタープリタ上で 充分にＢＵＧを取ってください。 (１)コンパイラはｄＢ−ＩＢＡＳＩＣ上にロードするので、 　　ｄＢ−ＩＢＡＳＩＣがＸ１に入っていない場合は、 　　まずｄＢ−ＩＢＡＳＩＣを起動してください。 　　次に、インタープリタ・レベル(ｄＢ−ＩＢＡＳＩＣのコマンド待ち状態)で、 　　・―――――――――――――――・ 　　｜　　ＣＬＥＡＲ＆ＨＤＦＦＦ　　｜ 　　・―――――――――――――――・ 　　を実行してください、これで、ｄＢ−ＩＢＡＳＩＣのエリアを制限し、 　　コンパイラをロードするエリアを確保します。 (２)ＬＯＡＤＭ、またはモニタ(ＭＯＮ)モードの 　　ロード・コマンドＬでロードします。 (３)コンパイラの実行アドレスＥ０００Ｈを呼び出して、 　　コンパイラを起動します。 　　ｄＢ−ＩＢＡＳＩＣのインタープリタ・レベルでは、 　　ＣＡＬＬ＆ＨＥ０００となります。 　　また、モニタ・モードの場合は、 　　　(１)＃Ｊ 　　　(２)Ｊ−ａｄｒ．：Ｅ０００ 　　と入力します。 (４)この入力を終えるとＣＲＴ画面に、 　　・――――――――――――――――――――――――――・ 　　｜　Ｉ−ＢＡＳＩＣ　ＣＯＭＰＩＬＥＲ　Ｖｅｒ　１．０　｜ 　　｜　ＴＡＰＥ　ＬＯＡＤ　（Ｙ　ｏｒ　Ｎ）？　　　　　　｜ 　　・――――――――――――――――――――――――――・ 　　と表示されます。 　　カセット・テープからソース・プログラムをロードするか、 　　メモリ上にあるソース・プログラムをそのまま使用するか決めてください。 　　テープからソース・プログラムをロードする場合は、 　　ソース・プログラムの入ったカセット・テープをセットしてから 　　[Ｙ]を入力してください。 　　注１：テープからソース・プログラムをロードした場合、 　　　　　メモリの４０００Ｈ番地から格納されるので、 　　　　　ｄＢ−ＩＢＡＳＩＣのインタープリタ部(4000H〜5B00H)は破壊され、 　　　　　以後ｄＢ−ＩＢＡＳＩＣのインタープリタ・レベルには 　　　　　戻れません、 　　　　　すでにメイン・メモリ上にソース・プログラムがあり、 　　　　　それをコンパイルする場合は、 　　　　　テープからロードする必要がないので 　　　　　[Ｎ]を入力してください。 　　注２：モニタ・モードからｄＢ−ＩＢＡＳＩＣのインタープリタ・レベルには、 　　　　　Ｒコマンドで戻れます。 　　　　　また、コンパイルしたオブジェクトがソース・プログラムに 　　　　　重なっていない場合は、再びソース・プログラムを 　　　　　ｄＢ−ＩＢＡＳＩＣのインタープリタで編集することも可能です。 　　　　　ただし、オブジェクト・プログラムを実行すると、 　　　　　実行にともなってワーク・エリアが変わるので、 　　　　　これによってｄＢ−ＩＢＡＳＩＣ、テキストなどが 　　　　　破壊される場合があるので、充分に気をつけてください。 (５)次に、テープからロードしたソース・プログラム、 　　またはすでにメモリ上にあるソース・プログラムの範囲が 　　16進数の形式で表示されます。 (６)ここで次のように、ソース・プログラムをコンパイルして 　　オブジェクトに落とす番地(ＡＤＲ．)を聞いてきます。 　　・――――――――――――――――――――――――――――――・ 　　｜　ＯＢＪ　ＡＤＲ．（＞＝４０００Ｈ）？　００００　　　　　　｜ 　　｜　　　　　　　　　　　　　　　　　　　　｜　　　　　　　　　｜ 　　｜　　　　　　　　　　　　　　　　　　　　・−−カーソル点滅　｜ 　　・――――――――――――――――――――――――――――――・ 　　設定可能番地は４０００Ｈ以降です。 　　ソース・プログラムの範囲が小さく、 　　残りのメモリ・エリアにオブジェクトが入るならば、 　　ソース・プログラムの最終番地より後に設定してください。 　　このことによって、(４)で述べたように、 　　モニタ・モードからｄＢ−ＩＢＡＳＩＣのインタープリタに戻って 　　ソース・プログラムの再編集が可能となります。 　　　注１：テープからソース・プログラムをロードせず、 　　　　　　メモリ上のソースをそのまま使う場合でも、 　　　　　　ソース・プログラムの範囲にオブジェクトの 　　　　　　先頭アドレスが重なった場合、 　　　　　　メイン・メモリ上でコンパイルを行なったり、 　　　　　　このように重なったオブジェクトを 　　　　　　メイン・メモリに読み込んだりすると、 　　　　　　重なった部分のソース・プログラムはなくなります。 　　　　　　この場合、ｄＢ−ＩＢＡＳＩＣのインタープリタへ戻って 　　　　　　ソースプログラムの編集はできません。 (７)オブジェクトに落とす先頭アドレスを入力すると、ＣＲＴ画面に 　　・――――――――――――――――――――――・ 　　｜　ＰＯＲＴ　ＳＡＶＥ　（Ｙ　ｏｒ　Ｎ）　？　｜ 　　・――――――――――――――――――――――・ 　　と表示されます。 　　コンパイルによってオブジェクトに落とす場所を指定します。 　　[Ｙ]を入力すると、Ｇ−ＲＡＭ上にコンパイルしたオブジェクトを 　　落とします（Ｉ／Ｏポートを経由してＧ−ＲＡＭ上ににセーブする）。 　　[Ｎ]を入力すると、(６)で設定したメイン・メモリ上の 　　オブジェクトの先頭番地からオブジェクトがセーブされます。 　　ソース・プログラム領域と、オブジェクト領域が重なっていない場合のみ、 　　直接メイン・メモリにオブジェクトを落とせます。 　　重なっている場合は、Ｇ−ＲＡＭにセーブ（ＰＯＲＴ　ＳＡＶＥ）します。 (８)次のように、コンパイラのワーク先頭番地を聞いてきます。 　　・――――――――――――――――――――――――――――――・ 　　｜　ＷＯＲＫ　ＡＤＲ．（＜Ｅ０００Ｈ）　？００００　　　　　　｜ 　　｜　　　　　　　　　　　　　　　　　　　　｜　　　　　　　　　｜ 　　｜　　　　　　　　　　　　　　　　　　　　・−−カーソル点滅　｜ 　　・――――――――――――――――――――――――――――――・ 　　Ｅ０００Ｈより小さい値で、ソース・プログラム領域、 　　またメイン・メモリにオブジェクトを落とす場合は、 　　さらにそのオブジェクト範囲に重ならない番地を指定します。 　　ソース・プログラムの大きさによって 　　オブジェクトの大きさも変わるので、一概にはいえませんが、 　　通常はＤ０００〜ＤＦ００Ｈ位が適当でしょう。 (９)次に、 　　・―――――――――――――――――――――――――――――――・ 　　｜　ＬＩＮＥ　ＴＡＢＬＥ　ＤＩＳＰＬＡＹ　（Ｙ　ｏｒ　Ｎ）　？　｜ 　　・―――――――――――――――――――――――――――――――・ 　　と聞いてきます。 　　ソースプログラムの行番号に対応するオブジェクトの番地を、 　　画面に表示する場合は[Ｙ]を、 　　また表示しない場合は[Ｎ]を入力してください 　　(通常は[Ｎ]を入力してください)。 　　[Ｙ]、または[Ｎ]を入力して[ＲＥＴＵＲＮ]キーを押すと、 　　コンパイルを開始し、 　　　ＰＡＳＳ−１ 　　　ＰＡＳＳ−２ 　　と表示されます（番地の表示を指定した場合は、 　　行番号とそれに対応する番地も表示されます）。 　　このとき、エラーが出た場合、 　　再度ソース・プログラムを見直してください。 　　例．＄Ｌ，ＬＩＳＴ，ＣＬＥＡＲなど、これらはコンパイルできません。 (10)コンパイルが終了すると、オブジェクトの最終番地と変数の最終番地が、 　　次のように表示されます。 　　・――――――――――――――――――――――――――――――・ 　　｜　ＯＢＪ　ＥＮＤ　ＡＤＲ．　＝　□□□□Ｈ……オブジェクト　｜ 　　｜　ＶＡＲ　ＥＮＤ　ＡＤＲ．　＝　□□□□Ｈ……変数　　　　　｜ 　　・――――――――――――――――――――――――――――――・ (11)オブジェクトをＧ−ＲＡＭに落とした場合、 　　さらに次のように聞いてきます。 　　・―――――――――――――――――――――――・ 　　｜　ＰＯＲＴ　ＬＯＡＤ　（Ｙ　ｏｒ　Ｎ）　？　　｜ 　　・―――――――――――――――――――――――・ 　　Ｇ−ＲＡＭに落としたオブジェクトを、 　　メイン・メモリにロ−ドする場合は[Ｙ]を入力してください。 　　[Ｎ]を入力すると、メイン・メモリ内のソース・プログラムなどは 　　破壊されずそのまま残ります。 (12)コンパイルが終了し、各最終番地が表示されると 　　（あるいは、“ＰＯＲＴ　ＬＯＡＤ”と聞いてきたとき、 　　　[Ｙ]または[Ｎ]を入力後）、 　　モニタのコマンド待ちモードとなり、 　　プロンプト・シンボル“＃”が表示されます。 (13)オブジェクトの実行は(６)で指定した番地にジャンプします。 ｄＢ−ＩＢＡＳＩＣの命令、およびチェック・ポイント ●コマンド ＡＰＰＥＮＤ 　メモリに格納されている行番号の最終値上り、 　テープから追加する行番号の方が大きくなければなりません。 　また、ｄＢ−ＢＡＳＩＣのＭＥＲＧＥでは、 　ＡＳＣＩＩセーブされたプログラム・ファイルでしたが、 　ｄＢ−ＩＢＡＳＩＣのＡＰＰＥＮＤでは普通にセーブした 　プログラム・ファイルを使用します。 ＬＩＳＴ／ＳＡＶＥ 　ＬＩＳＴによるカセット・テープヘの出力はありません。 　ｄＢ−ＩＢＡＳＩＣでは、ＡＳＣＩＩ形式のセーブ機能はありません。 　また、ＡＳＣＩＩ形式のプログラムのロード機能もありません。 ＲＵＮ 　コンパイルしたオブジェクト・プログラムでのこの実行は、 　先頭アドレス、または指定参照先に対応するアドレスに飛ぶだけです。 　変数の初期化などはインタープリタと違い行ないません。 　変数の初期化が必要なときは、必ずＣＬＲ命令を使ってください。 ●特殊コマンド ＄Ｌ 　初期値は１５文字です。 　したがって、文字例としては１変数に対して１４文字までしか、扱えません。 　それ以上使用したい場合は、 　ＩＢＡＳＩＣが起動した直後（コンパイルするときも、ＩＢＡＳＩＣの起動時）に、 　必ず＄Ｌを実行して、 　使用する文字列の文字数（最大２５５まで）を設定してください。 ●一般ステートメント ＣＡＮＣＥＬ 　ｄＢ−ＢＡＳＩＣのＶｅｒ．１．２では、ＦＯＲ〜ＮＥＸＴの 　スタック・アップ機能もありますが、 　ＩＢＡＳＩＣの場合、ｄＢ−ＢＡＳＩＣ　Ｖｅｒ．１．０と同様、 　サブルーチンの取り消し機能だけとなります。 ＣＡＳＥ 　条件にＥＬＳＥは使えません。 ＣＬＥＡＲ 　ｄＢ−ＢＡＳＩＣのような文字領域の設定機能はありません。 　ｄＢ−ＩＢＡＳＩＣの場合、＄Ｌで各文字列の長さを固定しています。 　ＣＬＥＡＲはｄＢ−ＩＢＡＳＩＣのインタープリンタのみで有効です。 　コンパイルはできません。 　変数の初期化のみを行なうときはＣＬＲを使います。 ＤＩＭ 　２次元配列までで添字は０〜２５４の範囲です。 ＥＮＤ 　この命令をコンパイルし実行すると、ＥＮＤに対応する場所で 　実行を停止してモニタ・モードとなります。 　このとき、ＡＦ、ＢＣ、ＤＥ、ＨＬ、 　Ａ’Ｆ’、Ｂ’Ｃ’、Ｄ’Ｅ’、Ｈ’Ｌ’、 　ＩＸ、ＩＹ、ＰＣ、ＳＰの順に、 　各レジスタ（ペア）の内容が表示されます。 ＦＯＲ〜ＮＥＸＴ 　ｄＢ−ＩＢＡＳＩＣでは、ＳＴＥＰの増分において変数で指定できません。 　必ず数値定数を使います。 ＧＯＴＯ／ＧＯＳＵＢ／ＲＥＳＴＯＲＥなど 　ｄＢ−ＩＢＡＳＩＣでは、行番号、ラベルのみ参照します。 　参照先に数値変数は使えません。 ＳＴＯＰ 　コンパイルして、この命令が実行されたときに、 　[ＢＲＥＡＫ]キー（[ＳＨＩＦＴ]＋[ＢＲＥＡＫ]、または 　[ＣＴＲＬ]＋[Ｃ]）が押されていれば、 　ＥＮＤと同じ動作を行ないます。 　それ以外なら次の実行に移ります。 ●入出力ステートメント ＩＮＰＵＴ 　入カフォーマッ卜指定などはできません。 ＯＵＴ／ＰＯＫＥ〔＠〕 　連続指定できません。 　１度に１バイト・データ１個のみの出力となります。 ＰＲＩＮＴ＃ 　ＰＲＩＮＴ＃０のみです。 ●スクリーン・ステートメント ＢＯＸ 　アトリビュート指定かありません。 　ＣＯＬＯＲ文などを併用して指定します。 ＣＩＲＣＬＥ 　ｄＢ−ＢＡＳＩＣの比率の部分は、 　ｄＢ−ＩＢＡＳＩＣでは縦の半径となります 　（第１番目の半径が横の半径となります）。 ＣＯＬＯＲ 　バラメータを省略するとコンパイラでは機能しません。 ＬＩＮＥ 　ｄＢ−ＢＡＳＩＣ　Ｖｅｒ．１．２ではタイリング・パターンが使えますが、 　ＩＢＡＳＩＣでは使えません。 ＰＡＩＮＴ 　タイル・バターンのペイントはできません。 ●特殊ステートメント ＵＳＲ 　ｄＢ−ＢＡＳＩＣとｄＢ−ＩＢＡＳＩＣでは、 　レジスタＢＣ，とＨＬの書式が違います。 ＷＡＩＴ 　ＷＡＩＴの引数１に対し、１ｍｓｅｃ停止します。 　なお、ｄＢ−ＢＡＳＩＣでは、引数１に対して、 　０．１ｓｅｃ（＝１００ｍｓｅｃ）です。 ●一般関数 ＦＲＥ 　式はダミーで、テキストの空エリアを与えます。 ＰＯＳ 　Ｘ，Ｙ両方の座標を与えることができます。 　ｄＢ−ＢＡＳＩＣのＣＳＲＬＩＮの代用をＰＯＳ（１）で行ないます。 数値関数 　小数点以下のでるものは、小数点以下を切り捨て整数部のみを与えます。 ＳＩＮ／ＣＯＳ 　度単位の値です。 　また、何倍するかも指定します。 ＲＮＤ 　０から（式の値）−１までの値の整数を与えます。 ●ストリング関数 ＣＨＲ＄ 　連続してコードをつなげません。 　（例：ＣＨＲ＄（＆Ｈ４１，＆Ｈ４２，＆Ｈ４３，……）→できない）。